home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Shareware Grab Bag
/
Shareware Grab Bag.iso
/
007
/
boosters.arc
/
FSTRHEAP.PAS
< prev
next >
Wrap
Pascal/Delphi Source File
|
1985-11-03
|
429b
|
10 lines
{ -----------------------------------------
FSTRHEAP searches Page on the heap for
the first occurrence of S. If S found,
FstrHeap sets X,Y to the address of S[1].
If not found, X = 0.
----------------------------------------- }
Procedure FstrHeap ( Page : HeapBuf;
S : AnyString;
var X : ColumnType;
var Y : RowType ); external 'FstrHeap.com';